home *** CD-ROM | disk | FTP | other *** search
/ Especial Multimedia / Especial Multimedia.iso / Multimed / Herra / TIMWIN.ZIP / DFFT.CMD < prev    next >
OS/2 REXX Batch file  |  1993-09-22  |  1KB  |  56 lines

  1. ;TIM-DEMO                0.5.2                   DFFT
  2. ;*****************************************************************************
  3. #define DfrdFFT             1190
  4. #define DfrdFFT1            1200
  5. #define DfrdFFT2            1210
  6. #define DfrdFFT3            1220
  7. #define DfrdFFT4            1230
  8. #define DfrdFFT5            1240
  9. #define DfrdFFT6            1250
  10.  
  11. #include timdefs.h
  12. parms
  13.   int windis       ;display mode Windows images
  14.   file timdemo
  15.   int hmode
  16. endparms
  17.  
  18. cls
  19.  
  20. dest p
  21. show p
  22. zoom 0
  23. copy holo
  24. *windispl h windis
  25.  
  26. help timdemo DfrdFFT1 2
  27. fftr p f
  28.  
  29. help timdemo DfrdFFT2 2
  30. ffto f
  31.  
  32. help timdemo DfrdFFT3 2
  33. dest q
  34. fftd f q 4 128
  35. *windispl i (windis+NO_DITHER)
  36.  
  37. help timdemo DfrdFFT4 2
  38. dest s
  39. thre q 50         ;threshold the frequencies
  40. lps 8              ;smoothen the object
  41. lsk 8
  42. ldi6 8 
  43. bit 8
  44. ;unif 9
  45. fftm s f           ;perform the filtering
  46.  
  47. help timdemo DfrdFFT5 2
  48. fftb f
  49. dest r
  50.  
  51. help timdemo DfrdFFT6 2
  52. fftd f r 4 0     ;display modulus
  53. *windispl i windis
  54.  
  55. stop
  56.